﻿Public Class DocumentoProveedor

    Dim _CIA, _SUC_Codigo, _TDOC_Codigo As String
    Dim _DCP_Codigo, _DCP_Fecha, _PROV_Codigo, _EST_Codigo As String

    Sub New()

    End Sub

    Sub New(cia As String, suc As String, tdoc As String, codigo As String, fecha As String, proveedor As String, estado As String)
        Me._CIA = cia
        Me._SUC_Codigo = suc
        Me._TDOC_Codigo = tdoc
        Me._DCP_Codigo = codigo
        Me._DCP_Fecha = fecha
        Me._PROV_Codigo = proveedor
        Me._EST_Codigo = estado
    End Sub

    Public Property CIA() As String
        Get
            Return _CIA
        End Get
        Set(value As String)
            _CIA = value
        End Set
    End Property

    Public Property SUC_Codigo() As String
        Get
            Return _SUC_Codigo
        End Get
        Set(value As String)
            _SUC_Codigo = value
        End Set
    End Property

    Public Property TDOC_Codigo() As String
        Get
            Return _TDOC_Codigo
        End Get
        Set(value As String)
            _TDOC_Codigo = value
        End Set
    End Property

    Public Property DCP_Codigo() As String
        Get
            Return _DCP_Codigo
        End Get
        Set(value As String)
            _DCP_Codigo = value
        End Set
    End Property

    Public Property DCP_Fecha() As String
        Get
            Return _DCP_Fecha
        End Get
        Set(value As String)
            _DCP_Fecha = value
        End Set
    End Property

    Public Property PROV_Codigo() As String
        Get
            Return _PROV_Codigo
        End Get
        Set(value As String)
            _PROV_Codigo = value
        End Set
    End Property

    Public Property EST_Codigo() As String
        Get
            Return _EST_Codigo
        End Get
        Set(value As String)
            _EST_Codigo = value
        End Set
    End Property

End Class
